home *** CD-ROM | disk | FTP | other *** search
/ 1000 Apple LAN Literacy / 1000 Apple LAN Literacy.iso / Apple LAN Literacy / Literacy Segments Part 1 / Literacy Segments Part 1 / background_10975.txt < prev    next >
Text File  |  1989-08-22  |  12KB  |  553 lines
  1. -- background: 10975 from stack: in
  2. -- bmap block id: 11140
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 1.1.1 Practice3
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global answerTracker
  9.   beenHereFlag 2,3
  10.   -- first param is item #, second is line # (of global)
  11.  
  12.   send mouseUp to bg btn "done"
  13.   repeat with i = 1 to 4
  14.     get line (line 2 of fld "key") of answerTracker
  15.     if it = "y" and i = line 1 of fld "key"
  16.     then set the hilite of bg btn ("graphic" & i) to true
  17.   else set the hilite of bg btn ("graphic" & i) to false
  18. end repeat
  19. pass openCard
  20. end openCard
  21.  
  22. on showfeedback
  23.   lock screen
  24.   show fld "feedback1"
  25.   show fld "feedback2"
  26.   show fld "feedback3"
  27.   show fld "feedback4"
  28.   show fld "masterFeedback"
  29.   show fld "correctAnswer"
  30.   show bg btn "Done"
  31.   unlock screen
  32. end showfeedback
  33.  
  34. on hidefeedback
  35.   lock screen
  36.   hide fld "feedback1"
  37.   hide fld "feedback2"
  38.   hide fld "feedback3"
  39.   hide fld "feedback4"
  40.   hide fld "masterFeedback"
  41.   hide fld "correctAnswer"
  42.   hide bg btn "Done"
  43.   unlock screen
  44. end hidefeedback
  45.  
  46. on feedback
  47.   global answerTracker
  48.   lock screen
  49.  
  50.   get last char of the short name of the target
  51.   if line (line 2 of fld "key") of answerTracker ‚↠"y" then
  52.     -- don't overwrite if Q has been answered
  53.     if it = line 1 of fld "key" then
  54.       -- this is the correct answer
  55.       put "y" into line (line 2 of fld "key") of answerTracker
  56.     else put "n" into line (line 2 of fld "key") of answerTracker
  57.   end if
  58.  
  59.   put fld ("feedback" & it) into fld "masterFeedback"
  60.   show fld "masterFeedback"
  61.   show bg btn "Done"
  62.  
  63.   unlock screen
  64. end feedback
  65.  
  66.  
  67. -- part 3 (field)
  68. -- low flags: 01
  69. -- high flags: 0000
  70. -- rect: left=18 top=1 right=38 bottom=442
  71. -- title width / last selected line: 0
  72. -- icon id / first selected line: 0 / 0
  73. -- text alignment: 0
  74. -- font id: 156
  75. -- text size: 24
  76. -- style flags: 10240
  77. -- line height: 32
  78. -- part name: Title
  79.  
  80.  
  81. -- part 14 (button)
  82. -- low flags: 00
  83. -- high flags: 0000
  84. -- rect: left=443 top=5 right=72 bottom=512
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 0 / 0
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: Instant Reference
  93. ----- HyperTalk script -----
  94. on mouseUp
  95.   instantReference "1.1.1"
  96. end mouseUp
  97.  
  98.  
  99. -- part 15 (button)
  100. -- low flags: 00
  101. -- high flags: 2000
  102. -- rect: left=480 top=143 right=172 bottom=511
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 1310 / 1310
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: Student Services
  111. ----- HyperTalk script -----
  112. on mousedown
  113.   SSpopUp
  114. end mousedown
  115.  
  116. on mouseup
  117.   if the mouseloc is not within the rect of me then exit to hyperCard
  118.   doSS
  119. end mouseup
  120.  
  121.  
  122.  
  123. -- part 16 (button)
  124. -- low flags: 00
  125. -- high flags: 2000
  126. -- rect: left=482 top=176 right=205 bottom=511
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 162 / 162
  129. -- text alignment: 1
  130. -- font id: 0
  131. -- text size: 12
  132. -- style flags: 0
  133. -- line height: 16
  134. -- part name: Help
  135. ----- HyperTalk script -----
  136. on mouseUp
  137.   Help
  138. end mouseUp
  139.  
  140.  
  141.  
  142. -- part 17 (button)
  143. -- low flags: 00
  144. -- high flags: 2000
  145. -- rect: left=482 top=294 right=320 bottom=509
  146. -- title width / last selected line: 0
  147. -- icon id / first selected line: 1236 / 1236
  148. -- text alignment: 1
  149. -- font id: 0
  150. -- text size: 12
  151. -- style flags: 0
  152. -- line height: 16
  153. -- part name: Last Menu
  154. ----- HyperTalk script -----
  155. on mouseUp
  156.   go to card "Individual and Work P/1"
  157. end mouseUp
  158.  
  159.  
  160. -- part 18 (button)
  161. -- low flags: 00
  162. -- high flags: 2000
  163. -- rect: left=478 top=319 right=341 bottom=498
  164. -- title width / last selected line: 0
  165. -- icon id / first selected line: 1238 / 1238
  166. -- text alignment: 1
  167. -- font id: 0
  168. -- text size: 12
  169. -- style flags: 0
  170. -- line height: 16
  171. -- part name: Prev
  172. ----- HyperTalk script -----
  173. on mouseUp
  174.   lock screen
  175.   go prev
  176.   unlock screen with scroll right
  177. end mouseUp
  178.  
  179.  
  180. -- part 19 (button)
  181. -- low flags: 00
  182. -- high flags: 2000
  183. -- rect: left=493 top=319 right=341 bottom=512
  184. -- title width / last selected line: 0
  185. -- icon id / first selected line: 1237 / 1237
  186. -- text alignment: 1
  187. -- font id: 0
  188. -- text size: 12
  189. -- style flags: 0
  190. -- line height: 16
  191. -- part name: Next
  192. ----- HyperTalk script -----
  193. on mouseUp
  194.   lock screen
  195.   go next
  196.   unlock screen with scroll left
  197. end mouseUp
  198.  
  199.  
  200. -- part 21 (field)
  201. -- low flags: 01
  202. -- high flags: 0000
  203. -- rect: left=16 top=38 right=67 bottom=438
  204. -- title width / last selected line: 0
  205. -- icon id / first selected line: 0 / 0
  206. -- text alignment: 0
  207. -- font id: 156
  208. -- text size: 20
  209. -- style flags: 0
  210. -- line height: 26
  211. -- part name: Subtitle
  212.  
  213.  
  214. -- part 22 (field)
  215. -- low flags: 01
  216. -- high flags: 0000
  217. -- rect: left=16 top=75 right=130 bottom=457
  218. -- title width / last selected line: 0
  219. -- icon id / first selected line: 0 / 0
  220. -- text alignment: 0
  221. -- font id: 156
  222. -- text size: 16
  223. -- style flags: 0
  224. -- line height: 17
  225. -- part name: Question
  226.  
  227.  
  228. -- part 33 (field)
  229. -- low flags: 81
  230. -- high flags: 2007
  231. -- rect: left=8 top=36 right=94 bottom=231
  232. -- title width / last selected line: 0
  233. -- icon id / first selected line: 0 / 0
  234. -- text alignment: 0
  235. -- font id: 156
  236. -- text size: 16
  237. -- style flags: 0
  238. -- line height: 17
  239. -- part name: Feedback1
  240.  
  241.  
  242. -- part 52 (field)
  243. -- low flags: 01
  244. -- high flags: 0000
  245. -- rect: left=16 top=136 right=156 bottom=445
  246. -- title width / last selected line: 0
  247. -- icon id / first selected line: 0 / 0
  248. -- text alignment: 0
  249. -- font id: 3
  250. -- text size: 10
  251. -- style flags: 256
  252. -- line height: 15
  253. -- part name: Instruction
  254.  
  255.  
  256. -- part 34 (field)
  257. -- low flags: 81
  258. -- high flags: 2007
  259. -- rect: left=8 top=97 right=155 bottom=231
  260. -- title width / last selected line: 0
  261. -- icon id / first selected line: 0 / 0
  262. -- text alignment: 0
  263. -- font id: 156
  264. -- text size: 16
  265. -- style flags: 0
  266. -- line height: 17
  267. -- part name: Feedback2
  268.  
  269.  
  270. -- part 41 (field)
  271. -- low flags: 01
  272. -- high flags: 0000
  273. -- rect: left=17 top=281 right=316 bottom=93
  274. -- title width / last selected line: 0
  275. -- icon id / first selected line: 0 / 0
  276. -- text alignment: 0
  277. -- font id: 156
  278. -- text size: 16
  279. -- style flags: 0
  280. -- line height: 17
  281. -- part name: Label1
  282.  
  283.  
  284. -- part 35 (field)
  285. -- low flags: 81
  286. -- high flags: 2007
  287. -- rect: left=8 top=159 right=216 bottom=231
  288. -- title width / last selected line: 0
  289. -- icon id / first selected line: 0 / 0
  290. -- text alignment: 0
  291. -- font id: 156
  292. -- text size: 16
  293. -- style flags: 0
  294. -- line height: 17
  295. -- part name: Feedback3
  296.  
  297.  
  298. -- part 36 (field)
  299. -- low flags: 81
  300. -- high flags: 2007
  301. -- rect: left=8 top=219 right=277 bottom=231
  302. -- title width / last selected line: 0
  303. -- icon id / first selected line: 0 / 0
  304. -- text alignment: 0
  305. -- font id: 156
  306. -- text size: 16
  307. -- style flags: 0
  308. -- line height: 17
  309. -- part name: Feedback4
  310.  
  311.  
  312. -- part 42 (field)
  313. -- low flags: 01
  314. -- high flags: 0000
  315. -- rect: left=140 top=281 right=315 bottom=247
  316. -- title width / last selected line: 0
  317. -- icon id / first selected line: 0 / 0
  318. -- text alignment: 0
  319. -- font id: 156
  320. -- text size: 16
  321. -- style flags: 0
  322. -- line height: 17
  323. -- part name: Label2
  324.  
  325.  
  326. -- part 43 (field)
  327. -- low flags: 01
  328. -- high flags: 0000
  329. -- rect: left=263 top=281 right=317 bottom=347
  330. -- title width / last selected line: 0
  331. -- icon id / first selected line: 0 / 0
  332. -- text alignment: 0
  333. -- font id: 156
  334. -- text size: 16
  335. -- style flags: 0
  336. -- line height: 17
  337. -- part name: Label3
  338.  
  339.  
  340. -- part 38 (field)
  341. -- low flags: 81
  342. -- high flags: 2007
  343. -- rect: left=8 top=280 right=338 bottom=231
  344. -- title width / last selected line: 0
  345. -- icon id / first selected line: 0 / 0
  346. -- text alignment: 0
  347. -- font id: 156
  348. -- text size: 16
  349. -- style flags: 0
  350. -- line height: 17
  351. -- part name: CorrectAnswer
  352.  
  353.  
  354. -- part 44 (field)
  355. -- low flags: 01
  356. -- high flags: 0000
  357. -- rect: left=387 top=281 right=317 bottom=474
  358. -- title width / last selected line: 0
  359. -- icon id / first selected line: 0 / 0
  360. -- text alignment: 0
  361. -- font id: 156
  362. -- text size: 16
  363. -- style flags: 0
  364. -- line height: 17
  365. -- part name: Label4
  366.  
  367.  
  368. -- part 64 (button)
  369. -- low flags: 00
  370. -- high flags: A004
  371. -- rect: left=179 top=321 right=340 bottom=324
  372. -- title width / last selected line: 0
  373. -- icon id / first selected line: 0 / 0
  374. -- text alignment: 1
  375. -- font id: 0
  376. -- text size: 12
  377. -- style flags: 0
  378. -- line height: 16
  379. -- part name: Answer
  380. ----- HyperTalk script -----
  381. on mouseUp
  382.   global answerTracker
  383.   lock screen
  384.   put "y" into line (line 2 of fld "key") of answerTracker
  385.   put fld "CorrectAnswer" into fld "MasterFeedback"
  386.   show fld "MasterFeedback"
  387.   show bg btn "Done"
  388.   unlock screen
  389. end mouseUp
  390.  
  391.  
  392. -- part 65 (field)
  393. -- low flags: 81
  394. -- high flags: 0001
  395. -- rect: left=423 top=0 right=13 bottom=466
  396. -- title width / last selected line: 0
  397. -- icon id / first selected line: 0 / 0
  398. -- text alignment: 65535
  399. -- font id: 4
  400. -- text size: 9
  401. -- style flags: 0
  402. -- line height: 12
  403. -- part name: CardTitle
  404.  
  405.  
  406. -- part 67 (button)
  407. -- low flags: 00
  408. -- high flags: 2000
  409. -- rect: left=482 top=208 right=234 bottom=509
  410. -- title width / last selected line: 0
  411. -- icon id / first selected line: 1234 / 1234
  412. -- text alignment: 1
  413. -- font id: 0
  414. -- text size: 12
  415. -- style flags: 0
  416. -- line height: 16
  417. -- part name: Lesson
  418. ----- HyperTalk script -----
  419. on mouseUp
  420.   lesson "1.1.1"
  421. end mouseUp
  422.  
  423.  
  424. -- part 68 (button)
  425. -- low flags: 00
  426. -- high flags: 2000
  427. -- rect: left=21 top=155 right=279 bottom=88
  428. -- title width / last selected line: 0
  429. -- icon id / first selected line: 0 / 0
  430. -- text alignment: 1
  431. -- font id: 0
  432. -- text size: 12
  433. -- style flags: 0
  434. -- line height: 16
  435. -- part name: Graphic1
  436. ----- HyperTalk script -----
  437. on mouseUp
  438.   feedback
  439. end mouseUp
  440.  
  441.  
  442. -- part 69 (button)
  443. -- low flags: 00
  444. -- high flags: 2000
  445. -- rect: left=145 top=155 right=279 bottom=212
  446. -- title width / last selected line: 0
  447. -- icon id / first selected line: 0 / 0
  448. -- text alignment: 1
  449. -- font id: 0
  450. -- text size: 12
  451. -- style flags: 0
  452. -- line height: 16
  453. -- part name: Graphic2
  454. ----- HyperTalk script -----
  455. on mouseUp
  456.   feedback
  457. end mouseUp
  458.  
  459.  
  460. -- part 70 (button)
  461. -- low flags: 00
  462. -- high flags: 2000
  463. -- rect: left=268 top=155 right=279 bottom=335
  464. -- title width / last selected line: 0
  465. -- icon id / first selected line: 0 / 0
  466. -- text alignment: 1
  467. -- font id: 0
  468. -- text size: 12
  469. -- style flags: 0
  470. -- line height: 16
  471. -- part name: Graphic3
  472. ----- HyperTalk script -----
  473. on mouseUp
  474.   feedback
  475. end mouseUp
  476.  
  477.  
  478. -- part 71 (button)
  479. -- low flags: 00
  480. -- high flags: 2000
  481. -- rect: left=391 top=155 right=279 bottom=458
  482. -- title width / last selected line: 0
  483. -- icon id / first selected line: 0 / 0
  484. -- text alignment: 1
  485. -- font id: 0
  486. -- text size: 12
  487. -- style flags: 0
  488. -- line height: 16
  489. -- part name: Graphic4
  490. ----- HyperTalk script -----
  491. on mouseUp
  492.   feedback
  493. end mouseUp
  494.  
  495.  
  496. -- part 39 (field)
  497. -- low flags: 81
  498. -- high flags: 2004
  499. -- rect: left=147 top=132 right=304 bottom=356
  500. -- title width / last selected line: 0
  501. -- icon id / first selected line: 0 / 0
  502. -- text alignment: 0
  503. -- font id: 156
  504. -- text size: 16
  505. -- style flags: 0
  506. -- line height: 17
  507. -- part name: MasterFeedback
  508.  
  509.  
  510. -- part 40 (button)
  511. -- low flags: 80
  512. -- high flags: A002
  513. -- rect: left=215 top=279 right=296 bottom=284
  514. -- title width / last selected line: 0
  515. -- icon id / first selected line: 0 / 0
  516. -- text alignment: 1
  517. -- font id: 0
  518. -- text size: 12
  519. -- style flags: 0
  520. -- line height: 16
  521. -- part name: Done
  522. ----- HyperTalk script -----
  523. on mouseUp
  524.   global answerTracker
  525.   lock screen
  526.   if line (line 2 of fld "key") of answerTracker = "y" then
  527.     -- question correctly answered
  528.     set the hilite of bg btn ("graphic" & line 1 of fld "key") to true
  529.   end if
  530.   hide fld "MasterFeedback"
  531.   hide bg btn "Done"
  532.   unlock screen
  533. end mouseUp
  534.  
  535.  
  536.  
  537. -- part 72 (field)
  538. -- low flags: 81
  539. -- high flags: 0002
  540. -- rect: left=1 top=308 right=341 bottom=59
  541. -- title width / last selected line: 0
  542. -- icon id / first selected line: 0 / 0
  543. -- text alignment: 0
  544. -- font id: 3
  545. -- text size: 12
  546. -- style flags: 0
  547. -- line height: 16
  548. -- part name: Key
  549. ----- HyperTalk script -----
  550. on mouseUp
  551.   hide me
  552. end mouseUp
  553.